home *** CD-ROM | disk | FTP | other *** search
/ Light ROM 1 / LIGHT-ROM 1 (Amiga Library Services)(1994).iso / ffdisks / d885.lha / False / other / chkbrack.f next >
Text File  |  1993-07-16  |  293b  |  30 lines
  1. {chkbrack.f}
  2. {checks brackets}
  3. 0a:0b:0c:
  4. [^$1_=~]
  5. [$'(=
  6.  [a;1+a:]?
  7.  $')=
  8.  [a;1-a:]?
  9.  $'[=
  10.  [b;1+b:]?
  11.  $']=
  12.  [b;1-b:]?
  13.  $'{=
  14.  [c;1+c:]?
  15.  $'}=
  16.  [c;1-c:]?
  17. ]
  18. #"#of () "
  19. a;0=~$~["is ok.
  20. "]?["NOT ok !!!
  21. "]?"#of [] "
  22. b;0=~$~["is ok.
  23. "]?["NOT ok !!!
  24. "]?"#of {} "
  25. c;0=~$~["is ok.
  26. "]?["NOT OK !!!
  27. "]?
  28.  
  29.  
  30.